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Teacher  Meeting 

There  will  be  a meeting  at  the  University  of  Pittsburgh  in  825  Cathedral 
of  Learning  on  Wednesday,  December  16,  at  4:00  p.m.  The  agenda  will  include 
(a)  A gathering  of  your  comments  and  suggestions  on  any  changes  we  should 
consider  in  present  procedures  (except— -yes,  we  know  you  want  more  termin- 
als and  time --no,  we  have  no  extra  money!),  (b)  Some  observations  from  our 
side  of  the  fence  on  the  usage  we  have  observed,  (c)  A discussion  cf  what  we 
should  propose  to  the  school  system  and  NSF  for  next  year,  and  the  justifica- 
tions you  see  for  such  a request,  (d)  A showing  of  a film  on  H„  Dean  Brown's 
work  in  using  computers  in  learning  environments  for  young  "Children, 

Summary  of  NBS 

We  are  enclosing  part  of  section  9 of  the  NBS  primer*  It  is  a summary 
of  the  current  features  in  NBS.  As  will  be  apparent  from  the  length  of  the  list, 
NBS  is  growing  to  be  an  extremely  comprehensive  language;  there  will  be  ad- 
ditional pages  for  the  primer  which  demonstrate  the  use  of  new  features  com- 
ing your  way  through  the  newsletter*  Later  this  year  you  will  receive  small 
pocket-size  cards  summarizing  NBS  which  can  be  distributed  to  your  students. 
In  the  meantime,  extra  copies  of  the  full  page  form  of  the  summary  are  avail- 
able for  insertion  in  the  primer, 
i 

Multiple  Statements 

One  of  the  many  unique  features  of  NBS  is  its  ability  to  handle  multiple 
statements*  We  are  enclosing  two  sheets  numbered  7-2  and  7-3  (also  for  in- 
sertion in  the  primer)  which  illustrate  the  use  of  such  statements*  The  sec- 
ond example  (bottom  of  page  7-2)  is  a program  that  teachers  may  find  useful 
in  posting  the  results  of  quizzes,  tests,  etc.  It  is  on  file,  and  you  can  call 
it  by  typing: 


—NBS 

>RUN  166TD  /GRADE/ 


PRINT  in  FORMAT; 'New  NBS  Library  Functions 


*ERJC 

m 

4J 


Sheet  8-2  shows'-two  examples  using  the  new  "picture"  forma':  feature  of 
NBS  for  precise  print  control.  The  full  set  of  format  codes  is  listed  on  sheet 
9-7.  Examples  of  use  of  library  functions  recently  added  to  NBS  are  shown  on 
sheets  6-5,  6-6,  and  6-7.  Students  of  probability  who  wish  to  use  the  DICE 
program  on  page  6-5  can  type: 

>RUN  104C  /DICE/ 


1 


EXAMPLE  OF  A DRILL  AND  PRACTICE  ROUTINE  WHERE  THE 
RANDOM  GENERATOR  OUTPUT  IS  BIASED  TO  FAVOR  SELECTION 
OF  PROBLEMS  ON  WHICH  THE  STUDENT  NEEDS  MOST  PRACTICE 

THIS  EXAMPLE  ALSO  ILLUSTRATES  USE  OF  NBS  STRING  FUNCTIONS 
TO  FIND  THE  NUMERICAL  QUANTITIES  IN  A STRING  RESPONSE 


> RUN 

DRILL  0N  COMPLEX  ARITHMETIC 


ALL  ANSWERS  MUST  RE  IN  THE  FORM  3 + 51  * THAT  IS, 

CONTAIN  A REAL  PART,  A SIGN,  AN  IMAGINARY 

PART,  AND  THE  LETTER  I.  ALWAYS  TYPE  0 FOR  ZERO 
EXAMPLES- -CORRECT  FORM:  -2+01  WRONG  FORM:  -2 

0+31  31 


0 + 01 


0 


WHAT  IS 
? -6+61 
GOOD 
WHAT  IS 
? 3+21 
RIGHT 
WHAT  IS 
? 56+201 
NO,  THE 
WHAT  IS 
? - 1 5 + 71 
NO,  THE 
WHAT  IS 
? 6-3  I 
NO,  THE 
WHAT  IS 
? -3+91 
GOOD 
WHAT  IS 
? 7-8  I 
NO,  THF. 
WHAT  IS 
? 7 + 2 1 
CORRECT 
WHAT  I S 
? 6-8  I 
NO,  THE 
WHAT  IS 
? 6-8  1 
NO,  THE 
YOU  HAD 
YOU  HAD 


THE  SUM  OF  -3-21  AND  -3+81 


THE  SUM  OF  +4+71  AND  -1-51 


THE  PRODUCT  OF  +7-41  AND  +8~5I 

PRODUCT  IS  +36-671 

THE  PRODUCT  OF  -3+41  AND  +5+31 

PRODUCT  IS  -27+111 

THE  PRODUCT  OF  +4+71  AND  -1+41 

PRODUCT  IS  -32+91 

THE  SUM  OF  -S+8I  AND  +5+11 


THE  PRODUCT  OF  +1+21  AND  -6-41 

PRODUCT  IS  +2-161 

THE  SUM  OF  +1-41  AND  +6+61 


THE  PRODUCT  OF  +6+01  AND  +3-21 

PRODUCT  IS  +18-121 

THE  PRODUCT  OF  +3-21  AND  +2+81 

PRODUCT  IS  +22+201 
4 ADDITION  PROBLEMS  CORRECT, 

0 MULTIPLICATION  PROBLEMS  RIGHT. 


YOUR  GRADE  IN  ADDITION  IS  100% 
YOUR  GRADE  IN  MULTIPLICATION  IS  0% 


OVERALL  GRADE  IS  40.0% 


ERIC 


SO  LONG 


2 


Note  that  the  program 
starts  to  favor  multi- 
plication aftep  it  is 
evident  that  the  student 
can  handle  addition. 


The  grades  at  the  end 
effectively  prescribe 
special  tutoring  for 
him  in  multiplication. 

A more  advanced  version 
of  this  program  automat- 
ically branches  to  such 
tutoring  on  the  basis  of 
this  history. 


> L I STNH 


5 VAR=ZER0 
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PR. 

"EXAMPLES- -CORRECT 

F0i 

RMs 

-2+01 

1 

1 

8 

PR. 

1 t 

0+31 

1 

1 

9 

PR. 

t 1 

0+0 1 

1 

20 

LET 

N~N+  1 

• SD  SD  • 1 ’ /' 


AND 

V 


SD  SD  * I ’ / 


I S. 


F0RM  3+51*  THAT 
IMAGINARY" 

TYPE  0 F2R  ZERO  " 
WRONG  FORM:  -2" 

31" 

0"  PR. 


1 P.5 
1 30 
LET 
1 40 
300 
3 1 0 

320 

3 70 
LET 
380 
400 

4 1 0 
420 

4 70 
LET 
480 
500 

5 10 
520 
530 
540 
550 

5 60 

6 00 
6 10 
6 1 5 
620 
630 
6 40 
6 50 


B=NUMC 1 9 ) - 1 0 


400 


IF  N> 1 0 LET  N = N- 1 GOTO  500 
R = N U M C 1 0 > LET  A=NUMC  19>-10  LET 
C = N UM C 19  5-10  LET  D=NUMC19>“10 
IF  R<<7+M-S)  GOTO  300  ELSE  GOTO 
PRINT  IN  FORM  A5:A,B,C,D 
LET  E = A + C LET  F = B + D 

GO  SUB  600 

IF’  ABSC  E-R>  < • 001  AND  ABSC F- I > < - 00 1 
S=S+1  GOTO  120 

PRINT  IN  FORM  BS:E»F  LET  W = W+ 1 GOTO 
PRINT  IN  FORM  CS:A:B:C:D 
LET  E = A*OB+D  LET  F=A*D+B*C 
GO SUB  600 

IF  ABSC E-R) <• 001  AND  ABSC F- I > < • 00 1 CALL 
M=M+ 1 GOTO  120 

PRINT  IN  FORM  DS:E,F  GOTO  120 


CALL  REIN, 
1 20 


REIN, 


"YOU  HAD  " : S : " ADDITION  PROBLEMS  CORRECT," 

"YOU  HAD  ":M:"  MULTIPLICATION  PROBLEMS  RIGHT." 

PR.  "YOUR  GRADE  IN  ADDITION  IS  ” ! < ST- 1 00 . ) / < S+  W)  S "%  " 
"YOUR  GRADE  IN  MULTIPLICATION  IS  ” : < M* 1 00 . ) / C N - S- W> 
PR.  "OVERALL  GRADE  IS  " : C C S+M> * 1 00 • > /N : " % " 

PR.  "SO  LONG" 


PR. 

PR. 

PR. 

PR. 

PR. 

PR  • 

END 

INPUT  RS 
LET  R = VAL ( R S ) 

LET  RS  = RI GHTC  R£, LENGTH C R$) - 1 ) 

LET  X1=INDEXCRS, "+")  LET  X2= INDEXC RS, 
LET  X=MAXCX1 ,X2> 

LET  I = VALC  RI GHTC  RS, LENGTH C R$ ) -X+ 1 > > 
RETURN 


L 140  REMARKS:  The  formula  7+M-S  initially  biases  the  random 
selection  of  addition  problems  j as  a favorable  response 
to  this  kind  of  problem  builds  up  (S  increasing) , the 
bias  shifts  t<?  multiplication.  M provides  the  converse 
effect  for  multiplication. 

SUBROUTINE  600  extracts  the  numerical  value  of  the  real  and  imaginary 

parts  of  the  response  R$  which  is  initially  accepted  as  a string 


LOGOUT 

IICAf’rr 


n 

O 


USING  THE  RANDOM  GENERATOR  "NUKE"  FOR  INDEX  CONTROL 


The  following  example  shows  how  NUM  can  be  used  to  set  indices 
(X  and  Y in  this  case), so  that  information  stored  in  arrays  is 
randomly  selected.  As  the  example  shows,  this  information  can 
be  alphanumeric,  since  NBS  allows  string  arrays 


2 A3i(  i >=*’* 

4 ASC2)=”*. 

6 BSC  1 >=■"# 

8 CSC3)=O,0 
1 0 ASC  4) 

CSC  5 ) = A S C 4) 


it" 

tt" 

tt" 

. tt" 

. tt" 
LET 


LET  CSC  1 ) = AS C 1 ) 
LET  A $ ( 3 > = AS  C 2 ) 
LET  BSC  3 ; = B$C  1 ) 
LET  CSC2)=CSC3> 


LET  BSC2)=A$C1)  LET  BSC4>=A$C 


LET  BSC  5>  =BSC  1 > 


LET  CSC  4 ) = ASC  4)  LET  A$C5>=CSC4> 

ASC  6)=ASC  4)  LET  BSC6)=ASC4>  LET  CSC6>=ASC4> 
T0SS--H0W  MANY  T0SSES  D0  Y0U  WISH  T0  SEE"? 


1 2 

40  PR • "DICE 

41  INPUT  N 

4 2 E0R  1 = 1 T0  N 
43  LET  X =N  UM  C 6 ) 

4 a LET  Y=NUMC6) 

45  PR*  PR* 

50  PR.  "tttttttttttttt",  "tttttttttttttt" 

55  PR*  ASCX),ASCY) 

60  PR.  RSCX) * B SC  Y ) 

65  PR*  CSCX)#C$CY) 

70  PR*  "tttttttttttttt",  PR.  "tttttttttttttt' 
7 5 NEXT  I 
1 00  END 


>PR#X+Y 


> RUN 


DICE  T0SS--H0W  MANY  T0SSES  D0  Y0U  WISH  T0  SEET  4 


tt  tttttttttttt 
tt  tt 

ft  . tt 
tt  tt 

ft  tttttttttttt 


tttttttttttttt 
tt  . m ft 
tt  ft 

tt.  .tt 

tttttttttttttt 


ft  tttttttttttt 
ft  . .tt 

ft  ft 

tt  . . tt 

tt  ft  ft  tt  ft  Hit 


tttttttttttttt 
tt  . tt 

tt  tt 

tt  . tt 

tttttttttttttt 


ft  tttttttttttt 
ft  tt 

tt  . tt 
ft  tt 

ft  tttttttttttt 


tf  tttttttttttt 
tt  . . tt 

tt . .ft 

tt  9 • tt 

tttttttttttttt 


o 
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ft  tttttttttttt 
ft  . . tt 

ft  . // 

//  . . // 

tt  ft#  it  it  ft  ft 


tttttttttttttt 
tt  tt 

tf  • ft 
rt  tt 

tt  tttttttttttt 


6 

H 

tt 


6-6 


USE  OF  MOD (X, Y)  [=  the  remainder  from  the  division  X/Y] 
Example  1; 

10  REM  'MOD*  USED  T0  'PULL  0FF ' LAST  DIGITS  0F  A NUMBER 
20  X=NUM<999)  PR  . X J M0DCX  * 1 00 )IM0DCX#  10)  F0R  1 = 1 T0  10 
30  END 


> RUN 

A 1 A 

1 A 

4 

299 

99 

9 

1 50 

50 

0 

63 

63 

3 

292 

92 

2 

360 

60 

0 

680 

80 

0 

809 

9 

9 

936 

36 

6 

612 

12 

2 

Example  2 : 

1 0 REM 

M0D 

FCN  USED  F0R  CYCLIC  C0NTR0L 

2 0 PR. 

"TYPE  AN  INTEGER": 

30  INPUT  N 

40  LET 

N=INT<  ABSCM0DCN# 15))) 

5 0 REM 

N0 

MATTER  WHAT  THE  USER  TYPES# IT  IS  CONVERTED 

5 1 REM 

T0 

A POSITIVE  INTEGER  N » WHERE  0<=N<=14 

55  PR. 

5 6 PR. 

M KM 

i"  X"j"  Y"i"  a$,!i"<n=":ns ") " 

57  PR. 

II  . ^ 

60  F0R  K = 1 T0  N 

70  LET  X=M0DCK»  3>  LET  Y*M0DCK- 1 # 3>  + l 

75  REM  * Y • WILL  TAKE  0N  THE  VALUES  1#2#3  CYCLICALLY  AS  K=1#2#...N 
80  0N  Y G0SUB  201#202#203 
90  PR«  KJX1Y1AS 
100  NEXT  K 
1 10  END 

201  LET  A$="0H"  RETURN 

202  LET  A$="Y0U"  RETURN 

203  LET  AS="KID"  RETURN 


> RUN 

TYPE  AN  INTEGER?- 56 • 3 


K X Y AS  (N=  ID 


1 

2 

3 

A 

5 

6 

7 

8 

9 

10 
1 1 


1 

2 

0 

1 

2 

0 

1 

2 

0 

1 

2 


1 0H 

2 Y0U 

3 KID 

1 0H 

2 Y0U 

3 KID 

1 0H 

2 Y0U 

3 KID 

1 0H 

2 Y0U 
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EXAMPLES  USING  THE  STRING  FUNCTIONS 
VAL , INDEX , LEFT,  RIGHT,  LENGTH , AND  SUBSTR 

Example  1 


10  PRINT  ••START** 

20 

30 

40  CS  = '*67  • 5 GRAMS” 

50  C=  VAL  CCS) 

60  IF  C>  50  LET  M=C-50 
70  PR.  CJMJCS 
80  END 


! REMARKS  MADE  AFTER 
! A * ! • SYMBOL 
SWILL  LIST  ONLY 

SVALCCS)  RETURNS  THE  NUMERIC 
'VALUE  OF  NUMERIC  SYMBOLS  IN  CS 
SOCCURING  BEFORE  THE  ’G*  IN  GRAMS 
SALLOWING  CALCULATION  WITH  C 


> RUN 
START 

67.5  17.5  67*5  GRAMS 


Example  2 

>10  INPUT  AS 

>20  X = I NDEX  C AS  > ” "> 

>30  PRINT  X 

>40  BS  = LEFTC  A$>X ) 

>50  PRINT  BS 

>60  END 

> RUN 

? WHO  AM  I 

4 

WHO« 

>35  X = X- 1 

> RUN 

? WHAT  ARE  YOU 

5 

WHAT 


INDEX (A$ , " " ) returns 
the  position  of  the  character 
between  quotes  (in  this  case 
a space)  in  the  string  A$ 


In  the  first  input  example, 
the  INDEX  is  4,  since  the 
first  space  in  WHO  AM  I 
is  in  the  4th  position. 

The  function  LEFT(A$,X) 
returns  the  first  X characters 
of  A$.  RIGHT (A$,X)  would 
return  the  last  X characters. 


Example  3 

>10  PR. "WHAT  IS  YOUR  NAME":  INPUT  NS 
>20  LET  N=LENGTH<  NS  > 

>30  LET  MI=SUBSTR(NS# INTCN/2) .3) 

>40  PR."G00D  GRIEF!  THE  3 MIDDLE  LETTERS  " 
>50  PR. "OF  YOUR  NAME  SPELL  "IMS 
> RUN 

WHAT  IS  YOUR  NAME? HORATIO 

GOOD  GRIEF!  THE  3 MIDDLE  LETTERS 

OF  YOUR  NAME  SPELL  RAT 


o 


N=7  for  HORATIO. 

M$  contains  3. 
characters  from  N$ 
starting  at  position 
INT (N/2) . 


7-2 


MULTIPLE  STATEMENTS  IN  NBS 

NBS  allows  several  statements  to  be  placed  on  a line.  Use  of 
this  feature  can  make  programs  more  compact,  more  readable,  and 
more  eZ C icier. t.  Square  brackets  are  used  in  multiple  statements 
to  limit  the  scope  of  iterations  controlled  by  suffixes. 


EXAMPLE  1:  Here  is  a one-line  program  to  print  all  possible 
products  of  integral  powers  of  2 up  to  8*8. 


-NBS 

>10  1=2  [J=2  [PR.I,J,I*J 'LET  J=J*2  WHILE  J<9]  LET  1=1*2  WHILE  I<9] 


>RUN 

2 

2 

4 

10  REM  SAME  PROGRAM  IN  OLD  BASIC 

2 

4 

8 

20  LET  1=2 

2 

8 

16 

40  LET  J=2 

4 

2 

8 

50  PRINT  I,J,I*J 

4 

4 

16 

60  LET  J=2* J 

4 

8 

32 

70  IF  J<9  GOTO  50 

8 

2 

16 

80  LET  1=2*1 

8 

4 

32 

90  IF  I<9  GOTO  40 

8 

8 

64 

100  END 

EXAMPLE  2:  The  following  program  plots  a bar  graph  showing  che 
distribution  of  test  grades  by  percentiles.  It  also  gives  the 
raw  mean,  and  the  mean  based  on  100%.  Line  170  illustrates  the 
ability  of  multiple  statements  to  alter  the  return  of  GOSUB  (to 
230  instead  of  to  180  in  this  case) . 


100  VAR=ZER0  DIM  PC  10) 

110  PR. "WHAT  IS  MAXIMUM  GRADE  POSSIBLE”! 

120  INPUT  M 

130  PR.  "ENTER  A GRADE  AFTER  EACH  • ? * • ** 

140  PR.  "ENTER  9999  WHEN  FINISHED." 

150  PR. 

160  INPUT  G 

170  IF  G>9000  GOSUB  410  GOTO  230 

180  IF  G>M  PRINT  "GRADE  EXCEEDS  MAX."  GOTO  160 
190  LET  Rl=Rt+G  LET  R2=R2+G*G 

200  LET  G = G* 100/M  LET  SI=S1+G  LET  S2=S2+G*G 
210  IF  G>99.9  LET  G=G-1 

220  LET  GsG/IO+1  LET  PC G> =P< G> ♦ 1 LET  N=N+1  GOTO  160 


ERIC 


230 

2 40 
250 
270 
290 

3 00 
320 
330 

3 40 
350 
370 
380 
390 
395 
400 

4 10 


C PR. "<*>"* FOR  J= ! TO 


PR.  PR. I 
FOR  1=1  TO 
PR.  TABC  5 > t 
PR.  1*10 

NEXT  I 

PR.  GOSUB  410 

PR.  "THE  UNSCALED  MEAN  IS  "IR1/N 
D=SQRTC CR2-CR1*R1/N))/CN-1>> 

PR.  "THF.  UNSCALED  STANDARD  DEVIATION 
GOSUB  410 

PR.  "THE  SCALED  MEAN  IS  "*S!/N 
D=SQRTC  CS2-CS1*S1/N))/CN-1)> 

PR.  "THE  SCALED  STANDARD  DEVIATION 
GOSUB  410 
END 

PR,  C PR • " = -"* FOR  Q= 1 TO  30 1 ( PR  I PR 


PC  I ) J©- 


IS  ":D 


RETURN 


•NOTE!  ONE  EXTRA 
! 'PR. • IS  NEEDED 
•TO  CANCEL  THE 
! EFFECT  OF  THF. 

5 LAST  GFNER- 

! ATED  IN  'FOR* 

! LOO PS  OF  THIS 
! TYPE » 


Sample  Run; 
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WHAT  IS  MAXIMUM  GRADE  P0SSIBLE767 
ENTER  A GRADE  AFTER  EACH  * ? ’ • 
ENTER  9999  WHEN  FINISHED* 


? 23 
? 34 
? 36 
? 41 
? 46 
? 78 

GRADE  EXCEEDS  MAX • 
? 50 
? 28 
? 58 
? 18 
? 24 
? 28 
? 30 

? 42  

739 
? 45 


? 48 
? 49 
? 40 
? 50 
? 56 
? 58 
? 41 
? 42 
? 57 
? 58 
? 59 
? 53 
? 61 
? 62 
? 47 
? 34 
? 38 
? 41 
? 42 
? 47 
? 51 
? 53 
? 59 
? 57 
? 34 
? 39 
? 42 
? 48 
? 49 
? 9999 


0 

10 

20 

30 

40 

50 

60 

70 

80 

90 


<*  > 


<*  > < sfs  > 


<*><*><*> 


<*><*><*><*><*>< 

<*><*><*><*>  <*><*><*><*><*> 
<*><*><*><*»<*>  - *><*><*>><*>  ******* 
<*><*><*><*><*><*><*><*> 


<*><*> 


100 


THE  UNSCALED  MEAN  IS  44.47727273 

THE  UNSCALED  STANDARD  DEVIATION  IS  11.0442843 


THE  SCALED  MEAN  IS  66*38398914  ^ ^ 

THE  SCALED  STANDARD  DEVIATION  IS  16*48400642 


EXAMPLES  USING  "PRINT  IN  FORM" 


Example  1 ; 

10  LET  X = 6. 08324956 

2.0  A$="SD • DDDDDBBBB  -D.DDBBBBBBB  $***  . ++BBBBB  DDD» DDD» DDD/" 

30  PRINT  IN  FORM  AS i X > X * X * X* 1 E8 

40  REM  NOTE  VARIABLES  IN  PRINT  STATEMENT  MATCH  FIELDS  IN  AS 

50  REM  SPACES  SEPARATE  FIELDS  IN  AS.  SLASH  / AT  END  CAUSES  LINE  FEED 


RUN 

+6.08325  6.08  $**6.08  608*324*956 

Example  2 ; Note  that  2 (SD.DDB)  is  equivalent  to  SD.DDB  SD.DDB 
100  AS=”2C SD. DDB>  SD • DDDB)  3<  SDD • DDDB)  SDD.DDDB/" 

110  B$  = '*2<  SD . DDB > 2 ( SD • DDDB ) ' UNDEF  ' SDD.DDDB  * UNDEF  * SDD.DDDB/' 

120  CS  = ”2( SD. DDB  > 2 < SD • DDDB ) SDD.DDDB  * UNDEF  * SDD.DDDB*  UNDEF  */** 
130  R=1 

1 40  PRINT  "X  Y SIN  COS  TAN  COT  SEC  CSC" 

150  FOR  X=1  BY  ~ • 1 WHILE  X>-1«1 
160  IF  ABS ( X > > = 1 GOTO  280 
170  Y=ABS<SQRTCR*R-X*X) ) 

180  IF  ABSC  X > < • 005  GOTO  250 
190  IF  ABSC  Y > < • 005  GOTO  280 

200  PRINT  IN  FORM  ASSXSYSY/RSX/R: Y/X  J X/Y  J R/X  S R/Y 

210  NEXT  X 

230  END 

240  GOTO  140 

250  X=0 

260  PRINT  IN  FORM  B$ i X X Y S Y/R : X/R S X/Y J R/Y 
270  GOTO  210 
280  Y - 0 

290  PRINT  IN  FORM  C S : X t Y : Y/R S X/R : Y/X : R/X 
300  GOTO  210 


> RUN 


X 

Y 

SIN 

COS 

TAN 

C0T 

SEC 

CSC 

+ 1.00 

+ 0 • 00 

+0.000 

+ 1 . 000 

+ 00 • 00  0 

UNDEF 

+01 .000 

UNDEF 

+ 0.90 

+ 0.  44 

+0. 436 

+0.900 

+00. 484 

+02.065 

+01.111 

+02. 294 

+ 0.80 

+ 0.60 

+0*600 

+0.800 

+00.750 

+0 1 . 333 

+ 01 e 250 

+01 . 667 

+ 0.70 

+ 0.71 

+0.714 

+0.700 

+01 .020 

■s  00. 98  0 

+01 . 429 

+ 01  * 400 

+ 0.60 

+ 0.80 

+0.800 

+0. 600 

+01 .333 

+00.750 

+01 . 667 

+01 .250 

+ 0.50 

+ 0.87 

+0.866 

+0.500 

+0 1 . 732 

+00.577 

+02.000 

+01.155 

+ 0.40 

+ 0 . 92 

+0.917 

+0-400 

+02-291 

+00.436 

+02. 500 

+01.091 

+ 0. 30 

+ 0.95 

+0.954 

+0.300 

+03. 160 

+00.314 

+03- 333 

+0 1 . 048 

+ 0.20 

+ 0.98 

+0.980 

+0*200 

+04.899 

+00*204 

+05.000 

+01 . 021 

+ 0.10 

+ 0.99 

+0.995 

+0. 100 

+09.950 

+00. 101 

+10-000 

+01 . 005 

+ 0.00 

+ 1-00 

+ 1 . 000 

+0+000 

UNDEF 

+00. 000 

UNDEF 

+01 .000 

-0.10 

+ 0-99 

+0.995 

-0.100 

-09.950 

-00. 101 

- 1 0. 000 

+01 .005 

-0.20 

+ 0.98 

+0.980 

-0-200 

-04.899 

-00.204 

-05.000 

+01.021 

-0.30 

+ 0.95 

+0.954 

-0. 300 

-03. 180 

>00*314 

-03.333 

+01 . 048 

-0.40 

+ 0.92 

+6.917 

-0. 400 

-02.291 

-00*436 

-02.500 

+01 .091 

-0.50 

+ 0.87 

+0.866 

-0. 500 

-01.732 

-00*  577 

-02.000 

+01.155 

-0.60 

+ 0.80 

+0.800 

-0. 600 

-01 .333 

-00*750 

-01 • 667 

+01 .250 

-0.70 

+ 0.71 

+0.714 

-0. 700 

-01 -020 

-00*980 

-01 .429 

+01 . 400 

T.ri®  0*80 

+ 0.60 

+0. 600 

-0.800 

-00.750 

-0  1 * 333 

-01 . 250 

+01-667 

0.90 

+ 0-  44 

+0 . 436 

-0.900 

-00 • 48  4 

-02*065 

-01.111 

+02*294 

+ 0.00 

+0.000 

- 1 .000 

+00.000 

UNDEF 

-01 • 000 

UNDEF 

SUMMARY  OF  NBS 


Abbrevi ations 


Lower 

case  symbols  specify  the 

following: 

V 



any  variable 

n 

= 

any  number 

nv 

= 

numeric  variable 

In 

= 

line  number 

sv 

= 

string  variable 

stmt 

= 

any  statement 

e 

= 

any  expression 

X 

= 

any  single  letter 

le 

= 

logical  expression 

or  array  name 

ne 

= 

numeric  expression 

(without  subscript) 

se 

= 

string  expression 

y 

= 

string  array  name 

z 

= 

array  name  (x  or  y) 

OPERATORS 


PRECEDENCE 


+ or  ** 
* 

/ 


MOD 


<>  or  # 
<< 

>> 

=# 

NOT 

AND 

OR 

XOR 

BUT 

IMP 

EQU 

BAN 

BOR 

BEX 


Exponentiation  1 
Multiplication  2 
Division  2 
Addition  or  string  concatenation  3 
Subtraction  or  negation  3 


Modulo 
Less  than 

Less  than  or  equal  to 
Equal  to 
Greater  than 

Greater  than  or  equal  to 
Not  equal  to 
Very  much  less  than 
Very  much  greater  than 
Approximately  equal  to 


Logical  complement  1 
Logical  conjunction  2 
Logical  disjunction  3 
Logical  exclusive  OR  3 
Logical  conjunction  4 
Logical  implication 


Logical  equivalence 

Binary  conjunction  (used  in  INTEGER 
mode  only) 

Binary  disjunction  (used  in  INTEGER 
mode  only) 

Binary  exclusive  OR  (used  in  INTEGER 
mode  only ) 
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PROGRAM  STATEMENTS 


These  statements  are  listed  in  alphabetic  order.  The  letters 
D and  I at  the  left  indicate  whether  statements  may  be  used 
in  DIRECT  or  INDIRECT  mode  respectively.  Note  that  .in  NEW- 
BASIC  more  than  one  statement  may  be  written  on  a line  and 
that  square  brackets  may  be  used  to  group  statements  for 
execution  in  a special  order. 


D I ACCEPT 
D APPEND  /file/ 

I APPEND  '/file/' 


D I BASE  n 

D I CALL  sub routine  name 
D I CALL  FNx (argument  list) 

D I CALL  $ subroutine  name 

D I CLOSE  ne 

X DATA  n ^ , n ^ , • • • 

I DEP  FNx  (argument  list)=e 
I DEF  FNx (argument  list) 

• 

FNx=e 

RETURN 

eric:  11 


See  INPUT. 

Merges  the  named  file  and  the 
current  program.  When  duplicate 
line  numbers  exist,  lines  in  the 
named  file  replace  those  in  the 
current  program.  After  the  indirect 
APPEND  is  completed,  execution 
resumes  at  the  next  statement 
in  sequence  after  the  APPEND 
statement . 

Causes  the  subscripts  of  arrays 
not  yet  dimensioned  to  begin  at 
the  number  specified  (n)  rather 
than  at  1. 

Calls  a NEWBASIC  subroutine. 

Calls  a programmer-defined 
function-subroutine. 

Calls  an  XTRAN  subroutine.  The 
$ is  required  only  if  the  name 
corresponds  to  a key  word  in 
NEWBASIC. 

Closes  data  file  opened  for 
input  or  output  as  file  ne . 

Stores  the  numbers  which  will 
be  used  as  the  values  of  the 
variables  named  in  a READ 
statement. 

Defines  a function. 

Defines  a multiple-line  sub- 
routine-function. The  argument 
list  contains  an  arbitrary  number 
of  variables.  The  function  may 
include  any  number  of  arguments. 

The  definition  must  end  with  (1) 

(cont.  next  pg.) 
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DEF  FNx (argument  list) 
(cont.  ) 


a statement  for  returning  the 
value  of  the  function  and  (2) 
a RETURN  statement. 


D I DEMAND 

D I DIM  z (ne1 ,ne2 ,ne3 , . . . ) 

D I DISPLAY 
I END 

D*  I FOR  v=ne. 

D*  I FOR  v=ne!  TO  ne, 

D*  I FOR  v=ne|  TO  net  STEP  ne3 

D*  I FOR  v=ne^  BY  ne^  TO  ne2 

D*  I FOR  v=ne1 ,ne2 ,ne3 , . . . 


See  INPUT. 

Reserves  array  storage  for  arrays 
whose  dimensions  are  given  by  ne^ 


See  PRINT. 

Terminates  a program.  END  should 
be  used  to  separate  the  main  pro- 
gram from  any  functions  or  sub- 
routines that  follow  it. 

Causes  execution  to  loop  through 
a set  of  operations  until  the 
conditions  specified  are  true. 
Incrementation  is  by  one  unless 
a STEP  is  specified  (ne.) . Note 
that  the  words  STEP  and  BY  are 
interchangeable.  A NEXT  state- 
ment terminates  the  FOR  loop  ex- 
cept when  used  as  a suffix. 

Causes  execution  to  loop  through 
a set  of  operations  for  the 
specified  values. 


D*  I FOR  v=ne.  STEP  ne,  Causes  execution  to  loop 

1 . indefinitely. 

D*  I FOR  v=ne  UNTIL  le  Causes  execution  to  loop  through 

D*  I FOR  v=ne,  UNTIL  le  STEP  ne.  a set  of  operations  until  expres- 
1 ^ sion  le  is  true. 


D*  I FOR  v=ne.  WHILE  le  BY  ne2 
D*  I FOR  v=neZ"  by  ne2  WHILE  le 
D*  I FOR  v=ne:,ne,,...STEP  ne. 
TO  ne47  WHILE  le 

D I GOTO  In 


Causes  execution  to  loop  through 
a set  of  operations  until  the 
expression  specified  is  false. 

Transfers  execution  to  statement 
iln  rather  than  continuing  execu- 
tion with  the  next  statement  in 
sequence. 


*FOR  is  valid  in  direct  mode  when  used  as  a suffix 
(See  page  9-10) 


in 
£ 
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D I GOSUB  In 


I IF  le  THEN  In 
I IF  le  [THEN]  GOTO  In 
I IF  le  [THEN]  GOSUB  In 


Transfers  execution  to  a sub- 
program beginning  at  statement 
In.  The  subprogram  must  end 
with  a RETURN  statement  which 
transfers  execution  back  to  the 
statement  in  the  main  program 
following  the  GOSUB.* 

Transfers  execution  to  state- 
ment In  if  the  expression 
specified  by  le  is  true. 


I 

IF 

le 

THEN 

stmt 

I 

IF 

le 

THEN 

in. 

ELSE 

ln2 

I 

IF 

le 

THEN 

lni 

ELSE 

GOTO  In 

I 

IF 

le 

THEN 

ELSE 

GOSUB 

In 

X 

I 

IF 

le 

^THEN 

stmt^  ELSE  stmt2 

Executes  the  statement  specified 
if  the  expression  le  is  true. 

An  IF-THEN  statement  may  option- 
ally be  followed  by  an  ELSE 
clause  which  will  be  executed 
if  the  relation  specified  is 
false.  When  the  IF  condition 
is  true,  the  ELSE  clause  is 
ignored  and  the  THEN  clause  is 
executed.  Note  that  a THEN  or 
an  ELSE  clause  may  also  include 
a suffix  modifier. 


D I INPUT  v.,v2,...  Enters  data  during  the  running 

of  a program.  When  an  INPUT 
statement  is  encountered,  exe- 
cution halts  and  NEWBASIC  prints 
a ? indicating  that  it  is  waiting 
for  one  or  more  values  to  be  enter 
ed  from  the  terminal.  The  values 
entered  are  assigned  to  the  var- 
iables listed  (Vi  ,v2  , . . . ) . Note 
that  ACCEPT  or  DEMAND  may  be  used 
instead  cf  the  word  INPUT. 

D I INPUT  FROM  ne : v.  , v~ , . . . Enters  data  from  the  symbolic  or 

binary  file  which  has  been  opened 
as  unit  ne.  The  values  read  from 
the  file  are  assigned  to  the  spec- 
ified variables. 

D I INPUT  FROM  ne.^  at  ne2:  Enters  data  from  a random  bi- 

v , v2 ' • • • nary  file  opened  as  unit  ne, , 

starting  at  location  ne.  on^the 
file. 


»Hf  m 

This  sequence  can  be  altered  by  using  the  multiple  statement: 

(IF  le)  GOSUB  ln^  GOTO  ln2 

This  statement  transfers  execution  to  statement  ln^.  When  the 
RETURN  is  encountered,  transfer  is  then  made  to  statement  ln2. 
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D I 
D I 


INPUT  IN  FORM  se : v. , v„ , . . . 
INPUT  FROM  ne  IN  FORM  se : 


Used  to  input  the  values  of 
variables  or  expressions  in 
special  format  for  use  with 
a PRINT  IN  FORM  statement. 
(See  PRINT. ) 


D I LET  v=e 

I LINK  ’/file/' 

D LOAD  / f i le/ 

I LOAD  ' /file/ ' 

D I LOGOUT 

I NEXT  v 
I NEXT  In 

I NORMAL  MODE  IS  x 


D I ON  ne  GOTO  ln.,ln2,  . . . 
ON  ne  GOSUB  ln_,  l'n2 


Assigns  values  to  program  var- 
iables. The  word  LET  is  optional. 
Alternate  forms  are  available  for 
multiple  assignment  [LET  vi+V2+e] 
and  assignment  of  a logical  value 
[LET  v = (ne1=ne2)]. 

Deletes  the  current  program,  sav- 
ing the  values  of  the  variables, 
and  begins  execution  at  the  first 
statement  of  the  specified  file. 

Deletes  the  current  program  and 
variables.  in  indirect  mode  it 
starts  execution  at  the  first 
statement  of  the  program  specified 

Logs  the  user  off  the  system. 

(Same  as  the  EXECUTIVE  LOGOUT 
command) 

Terminates  a loop  initiated  by 
a FOR  statement.  The  v (In) 
must  correspond  to  the  variable 
(line  number)  of  the  FOR  state- 
ment. The  line  number  parameter 
is  used  to  identify  FOR-NEXT 
pairs  in  nested  loops. 

Sets  the  implicit  mode  of  var- 
iables to  the  specified  (COMPLEX, 
INTEGER,  REAL,  DOUBLE  INTEGER, 
DOUBLE  REAL  or  STRING) . Var- 
iables whose  names  contain  a $ 
will  remain  string  variables 
until  explicitly  redefined.  Un- 
less specified,  normal  mode  is 
REAL. 

Transfers  execution  to  statement 
In,  depending  on  the  value  of  ne . 
If  the  integer  part  of  he  is  1 , 
execution  transfers  to  In.,  if 
2 , to  ln2,  etc. 


V 
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D I 


D I 
D I 


D I 
D I 


D I 
D I 

D I 
D I 

D I 
D I 

D I 

D I 
D I 

D I 
D I 
D I 


D I 


D I 


o 


ON  ENDFILE  (ne)  stmt 


ON  ERROR  GOTO  In 
ON  ESCAPE  GOTO  In 


OPEN  "/file/" , INPUT, ne 
OPEN  /file/, OUTPUT  BINARY, ne 


OPEN  /file/  RANDOM  INPUT  ne 
OPEN  /file/  RANDOM  OUTPUT  ne 

OPEN  //  FOR  INPUT  ne 
OPEN  //  FOR  OUTPUT  ne 


OPEN  /file/  FOR  INPUT  AS 
FILE  ne 

OPEN  /file/  FOR  INPUT, 
FILE  ne 

OPEN  se  FOR  INPUT  AS  ne 


Executes  the  statement  specified 
when  the  END  OF  FILE  ne  is  read. 

Transfers  execution  to  statement 
In  when  an  error  or  an  escape  is 
encountered . 

Opens  a symbolic  or  binary  file 
for  input  or  output.  Delimiting 
quotation  marks  may  be  used  with 
the  file  name  but  are  optional 
in  an  OPEN  statement. 

Opens  a random  binary  file  for 
input  or  output  as  file  ne. 

Enables  user  to  specify  the 
file  name  during  program 
execution. 

Opens  a file  for  input  as  the 
named  file  and  attaches  it  to 
unit  ne.  (ne  must  be  greater 
than  2 . ) 

Opens  string  expression  se  for 
input  as  ne . 


OUTPUT  See  PRINT. 

PAUSE  Causes  program  execution  to  halt 

and  control  to  return  to  the  NEW- 

BASIC  command  symbol. 

Prints  the  values  of  expressions 
or  variables.  The  comma  is  used 
for  normal  field  output,  the 
semicolon  for  packed  output,  and 
the  colon  for  concatenated  output. 
(WRITE,  TYPE,  DISPLAY  or  OUTPUT 
may  be  used  instead  of  the  word 
PRINT. ) 

PRINT  ON  ne : v. ,v„ , . . . Writes  the  values  of  the  listed 

1 ^ variables  on  a symbolic  or  binary 

file  opened  as  unit  ne. 

Writes  the  values  of  the  listed 
variables  on  a random  binary  file 
designated  as  unit  ne, , starting 
at  location  nej  on  the  file. 


15 


PRINT  ON  ne1  at  ne 
vl'v2' * 


2* 


P RINT  e.  , e_ , . . . 

PRINT  e| ; ef ; 

PRINT  efsep 
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D I PRINT  IN  FORM  sere, ,e,r...  Prints  the  values  of  variables 

or  expressions  in  the  field  for 
mat  specified  where  the  string 
expression  is: 


R 

Free  format  (decimal  or 
scientific  notation  form) 

D 

Indicates  position  of 
digit;  zero  always  printed. 

Y 

Digit;  zero  replaced  by 
blank. 

z 

Digit;  leading  zeroes  re- 
placed by  blanks. 

Q 

Left-adjusted  number;  un- 
needed character  positions 
are  suppressed. 

* 

Check  protect  (asterisk 
filling) 

$ 

Floating  dollar  sign. 

S 

Floating  sign. 

Prints  sign  if  number  is 
negative  (floats) . 

+ 

• 

Prints  sign  if  number  is 
positive  (floats) . 

Positions  decimal  point. 

V 

Positions  but  does  not  print 
decimal  point. 

E 

Positions  exponent  (forces 
scientific  notation) . 

Space 

Separates  fields  in  form. 

B 

Prints  blanks  on  output. 

Text 

; 7 

Prints  literally  any  string 
enclosed  in  primes  or  quo- 
tation marks . 

Prints  a carriage  return. 

t 

Prints  a comma  when  not  the 
leading  nonblank  character . 

er|c 

• 7,:  77:7  7 .iVfVV  .r  V 
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D I READ  V1,V2,.-- 

D I REM  text 

D I RESTORE 

I RETURN 

I STOP 

D I TYPE 
D I VAR=ZERO 

D I WRITE 

MATRIX  STATEMENTS 

D I MAT  = x2 

D I MAT  X = X1  *X2 


D I MAT  x = X,  + k2 


Assigns  values  obtained  from 
the  DATA  list  to  the  listed 
variables . 

Supplies  remarks  for  program 
description.  Remarks  are  not 
printed  except  during  LISTing 
of  the  program. 

Restores  the  DATA  list  after 
the  numbers  in  it  have  all 
been  read,  allowing  it  to  be 
reread  by  another  READ  state- 
ment. 

Returns  execution  to  the  next 
statement  in  sequence  in  the 
main  program  after  a GOSUB 
subprogram  or  a multiple  line 
programmer-defined  function 
has  been  executed. 

Halts  program  execution.  A 
direct  GOTO  statement  can  be 
used  to  restart  execution. 

See  PRINT. 

Sets  all  variables  equal  to 
zero. 

See  PRINT. 


Replaces  matrix  x..  with  matrix 

x2. 

Multiplies  matrix  x.  by  matrix 
x2.  The  same  matrix  name  may 
not  appear  on  both  sides  of 
the  equation.  Also,  the  number 
of  rows  in  X2  must  equal  the 
number  of  columns  in  x^ . 

Adds  matrix  xi  to  matrix  X2- 
x:.  and  X2  oust  have  the  same 
number  of  rows  and  columns. 
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D I MAT  x = 


D I MAT  x = x^  * (ne) 

D I MAT  x = ZER 
D I MAT  x = ZER  (ne^ ,ne2 / • • • ) 


D I MAT  x = IDN 

D I MAT  x = IDN  (ne^  ne2  ' * * * %t 


D I MAT  X = CON 

D I MAT  x = CON  (ne^ ,ne2 / • • • ) 


D I MAT  INPUT  z 


D I MAT  INPUT  z (n1 :n2 /n^sn^) 


D I MAT  INPUT  z FROM  ne : 
z (n.sn7,n3:n4) 


D I MAT  PRINT  

D I MAT  PRINT  z.; Z2 ; . . . 
D I MAT  PRINT  z^sz^:... 


Subtracts  matrix  X2  from  matrix 
x x-^  and  x2  must  have  the 
same  number  of  rows  and  columns . 
Matrix  x may  appear  on  both  sides 
of  the  equation  in  subtraction 
or  addition. 

Matrix  scalar  multiplication. 

Sets  the  working  size  of  the 
matrix  and  sets  all  the  ele- 
ments of  the  matrix  to  zero. 

(This  statement  dimensions 
the  matrix  as  x(ne^,ne2 

Sets  the  working  size  of  the 
matrix  and  sets  up  the  matrix 
as  an  identity  matrix.  (This 
statement  dimensions  the  matrix 
as  x (ne^ ,ne2 /•••)• ) 

Sets  the  working  size  of  the 
matrix  and  sets  all  the  ele- 
ments of  the  matrix  to  one. 

(This  statement  dimensions 
the  matrix  as  x (ne1,ne2 ,...).) 

Sets  the  working  size  of  the 
matrix.  Values  are  input  during 
the  running  of  the  program. 

(Note  that  ACCEPT  or  DEMAND  may 
be  used  instead  of  the  word 
INPUT . ) 

Sets  the  working  size  of  the 
matrix  and  dimensions  the  ar- 
ray as  specified  (n.snjfn.sn.) . 
Values  are  input  during  program 
execution. 

Sets  the  working  size  of  the 
matrix  and  dimensions  the  ar- 
ray as  specified  (n.  snj  ,n3  :n4)  . 
Values  are  input  from  a file 
designed  as  unit  ne. 

Prints  the  matrices  on  the  term- 
inal. Commas,  semicolons,  or 
colons  are  used  in  the  statement 
to  determine  the  form  of  the  out- 
put. (Note  that  WRITE,  TYPE, 
OUTPUT,  or  DISPLAY  can  be  used 
instead  of  the  word  PRINT.) 


D I MAT  READ  z 


Sets  the  working  size  of  the 
matrix.  Values  are  read  in 
from  a data  list. 
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DATA  TYPES 


D I COMPLEX  VirV2  , . . . 

D I DOUBLE  INTEGER  v]/v2'‘** 
D I DOUBLE  REAL  V^Vj,... 

D I INTEGER  V-^v.,, 

D I REAL  VlfV2,... 

D I STRING  v1,v2 , . . . 


Declares  the  specified  variables 
to  be  in  COMPLEX  mode . 

Declares  the  specified  variables 
to  be  in  DOUBLE  INTEGER  mode. 

Declares  the  specified  variables 
to  be  in  DOUBLE  REAL  (double 
precision)  mode. 

Declares  the  specified  variables 
to  be  in  INTEGER  mode . 

Declares  the  specified  variables 
to  be  in  REAL  mode. 

Declares  the  specified  variables 
to  be  in  STRING  mode.  Text  is 
equivalent  to  STRING  mode . 


SUFFIX  MODIFIERS 

(Note:  A logical  expression  is  considered  false  if  it  is 

equal  to  zero  and  true  if  it  is  not  equal  to  zero:) 


D I stmt  FOR  nv=ne. ,ne„ , . . . 
D I stmt  FOR  nv=nef  TO^ne„ 
STEP  ne.  ■ 

D I stmt  FOR  nv=ne  UNTIL  le 
D I stmt  FOR  nv=ne' WHILE  le 
BY  ne. 


Causes  execution  to  loop  through 
a set  of  operations  for  a spec- 
ified range. of  values  or  until 
a logical  condition  is  met.  (Add- 
itional syntactic  forms  of  FOR  are 
shown  in  the  PROGRAM  STATEMENTS 
section. ) 


D I stmt  IF  le 


D I stmt  UNLESS  le 


Causes  the  statement  to  which  it 
is  appended  to  be  executed  if 
the  logical  expression  le  is  true 

Causes  the  statement  to  which  it 
is  appended  to  be  executed  only 
if  the  logical  expression  i.e. 
is  false . 
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D I stmt  UNTIL  le 


D I stmt  WHILE  le 


Causes  the  statement  to  which 
it  is  appended  to  be  executed 
repeatedly  as  long  as  the  log- 
ical expression  le  is  false. 

Causes  the  statement  to  which  it 
is  appended  to  be  executed  re- 
peatedly as  long  as  the  expression 
le  is  true. 


OPERATING  COMMANDS 


D AGAIN 


D APPEND  /file/ 


D BREAK  In , In , . . . 

D CONTROL- G 


Repeats  the  last  statement  exe- 
cuted and  resumes  program  exe- 
cution. 

Merges  the  named  file  and  the 
current  program.  When  duplicate 
line  numbers  exist,  lines  in  the 
named  file  replace  those  in  the 
current  program. 

Sets  breakpoints  at  the  specified 
lines . 

Used  to  escape  out  of  program  exe- 
cution at  an  INPUT  request  or  to 
return  to  the  EXECUTIVE  from  the 
NEWBASIC  command  symbol. 


D DELETE  In,  In- In 


D DUMP  /file/ 


D EDIT  In 


Deletes  the  specified  line  or 
range . 

Creates  a core  image  of  the  cur- 
rent program  and  stores  it  in 
compiled  binary  from  under  the 
name  specified.  DUMP  files  may 
only  be  executed  or  deleted. 

They  are  executed  by  issuing 
the  command  EXECUTE  /file/  to 
the  EXECUTIVE  command  symbol  or 
by  typing  just  the  file  name 
(/file/)  to  the  EXECUTIVE  dash. 

Types  out  the  specified  line  and 
makes  it  the  previous  line  for 
editing  purposes. 
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EXTRACT  In,  In- In 

Deletes  all  but  the  specified  lines 

EXIT 

Used  to  exit  from  a subsystem. 

LIST 

LIST  In,  ln-ln 

Lists  the  current  program.  Indi- 
vidual line  numbers  or  ranges  of 
lines  can  be  specified  as  para- 
meters to  the  command. 

LISTNH 

LISTNH  In,  ln-ln 

Same  as  list,  except  that  the 
heading  containing  the  date, 
time , and  program  name  are  not 
typed  at  the  top  of  the  listing . 
(LISTNH  may  not  be  abbreviated 
as  other  commands.) 

LENGTH 

Types  the  length  of  the  current 
program  in  lines . 

LOAD  /file/ 

Retrieves  a previously  SAVEd  file 
and  places  it  in  working  storage 
as  the  current  program.  (Same  as 

OLD) 

MODIFY  In 

Locates  the  specified  line  and 
makes  it  the  previous  line  for 
editing  purposes.  The  line  is 
not  typed  out . 

NBS 

Prints  OK?  Upon  confirmation, 
deletes  all  of  program  and 
variables. 

NEW  /file/ 

Creates  a new  file  with  the  name 
specified. 

OLD  /file/ 

Retrieves  a previously  SAVEd  file 
and  places  it  in  working  storage 
as  the  current  program. 

POINTS 

Lists  all  breakpoints  currently 
being  used . 

PROCEED 

Restarts  program  execution  after 
a breakpoint. 

QED 

transfers  the  current  file  into 
the  QED  subsystem  for  further 
editing.  Typing  a Gc  (or  the  QED 
command  SCO)  transfers  the  edited 
program  back  into  NEWBASIC. 
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D RECOMPILE 

D RENUMBER 

D RENUMBER  In,  ln-ln,  n 

D RUN 
D RUN  /file/ 

D SAVE  /file/ 

D SCRATCH 

D STEP 

D TABS  n,n 

D TAPE 

D UNBREAK 


Recompiles  a program  after  cor- 
recting an  error  which  caused 
NEWBASIC  to  request  a nonexistent 
subprogram. 

Resequences  line  numbers  in  the 
current  file  starting  with  line 
100  and  incrementing  by  10.  The 
starting  line  number,  the  range 
of  lines  to  be  resequenced,  and 
the  increment  to  be  used  can  be 
supplied  as  parameters  to  the 
command . 

Begins  execution  of  the  current 
program  or  the  file  named  in  the 
command.  All  variables  are  set 
to  zero  when  the  command  is  issued. 

Saves  a permanent  copy  of  the 
current  program  on  the  file 
specified. 

Deletes  the  current  program  but 
saves  the  file  name  and  the  con- 
tents of  variable  storage. 

Executes  one  statement  after  a 
breakpoint  and  then  halts  again 
(may  be  abbreviated  as  S)  . 

Sets  tabs  at  the  specified  points 
for  special  tabbing  requirements. 
Standard  tab  positions  are  set  at 
8,  16,  32,  40,  48,  and  56. 

Appends  a file  or  series  of  line- 
numbered  NEWBASIC  statements  from 
paper  tape . 

Removes  all  breakpoints. 


D UNBREAK  In , In 

D WHERE 

D WIDTH  n 


Removes  breakpoints  from  the 
specified  lines. 

Lists  the  line  number  of  the  next 
statement  to  be  executed. 

Sets  the  assumed  width  of  the 
terminal  carriage  to  a number 
other  than  72  columns. 


22 


9-14 


EDITING  CONTROL  CHARACTERS 


Deletes  the  previous  character 
(echoes  f) 

Copies  one  character 

Copies  through  end  of  line 

Begins  or  ends  insertion  (echoes 
< or  >) 

Copies  through  end  of  lines;  does 
not  print  at  terminal. 

Copies  up  to  end  of  line 

Tabs  to  the  next  tab  stop  position 

Restarts  edit,  saving  changes 

Copies  up  to  specified  character  x. 

Restarts  edit;  does  not  save  changes. 

Retypes  line  to  current  point. 

Skips  single  character  from  input 
(echoes  %) 

Copies  line  to  next  tab  stop. 

Accepts  next  character  literally. 

Deletes  preceding  word  (echoes  s.) 

Skips  characters  through  specified 
character  (echoes  %) 

Skips  line  to  next  tab  stop 
(echoes  %) 

Copies  through  specified  character  x. 
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NUMERIC  FUNCTIONS 

ABS  (X) 

INT (X) 

MOD (X,Y) 

SGN(X) 

DIF  (X,Y) 

EXP (X) 

LOG (X) 

LGT , LOGIO (X) 

SQR, SQRT (X) 

SIN (X) 

COS (X) 

TAN (X) 

ARCSIN(X) 

ARCCOS (X) 

ATAN (X ) , ATAN (X , Y ) 
SINH(X) 

COSH (X) 

TANH(X) 

FIX  (X) 

FLOAT (I) 

SNGL(D) 

NUM(X) 

LSH (I, J) 

RSH (I, J) 


Absolute  value  of  X 

Integer  part  of  X 

X modulo  Y 

Sign  of  argument  X 

Positive  difference  ABS (X-Y) 

Exponential  of  X 

Natural  log  of  X 

Log,  base  10,  of  X 

Square  root  of  X 

Sine  of  X 

Cosine  of  X 

Tangent  of  x 

Arcsine  of  x 

Arccosine  of  X 

Arctangent  of  X or  of  x/Y 

Hyperbolic  sine  of  x 

Hyperbolic  cosine  of  X 

Hyperbolic  tangent  of  X 

Integer  mode  of  X (truncates) 

Floating  point  mode  form  of  I 

Single  precision  mode  form  of  D 

Random  integer  from  1 to  x 

Binary  left  shift  I for  J positions 

Binary  left  shift  I for  J positions 
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IMAG(C) 

REAL (C) 

CMPLX (X,Y) 
CONJG (C) 

MAX  (X ,Z) 

MIN (X , . . . ,Z) 
WAIT  (X ) 

POS  (I) 

PASS 

PASS  (In) 

RES PASS 
RESPASS  (In) 

DATE 

TEL 

TIME 


Imaginary  part  of  complex  number  C 

Real  part  of  complex  number  C 

Complex  number  X,Y 

Conjugate  of  (X,Y)  = (X,-Y) 

Maximum  of  arguments 

Minimum  of  arguments 

Halts  execution  for  X seconds 

Reads  position  of  file  I 

Number  of  times  statement  is 
executed . 

Resets  pass  counter 

Returns  a 12-character  string 
containing  the  date  and  time . 

Returns  zero  if  the  terminal 
input  buffer— is  empty;  other- 
wise it  returns  one. 

Reads  the  system  clock  in  1/60 
of  a second  units. 


STRING  FUNCTIONS 

INDEX (selfse2) 

LEFT(se,ne) 

LENGTH (se) 

RIGHT (se,ne) 

SPACE (ne) 

STR(ne) 

r\ 

o 

eric: 


Position  of  s©2  within  sel; 
e.g.,  INDEX ("ABC” , "C")  = 3. 

Substring  of  se,  ne  characters 
long  starting  from  left. 

Length  of  se. 

Substring  of  se;  ne  characters 
long,  starting  at  right. 

String  ne  spaces  long. 

String  of  the  characters  com- 
prising ne;  e.g. , STR(4)  = "4". 
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SUBSTR(se ,nelfne2) 

Substring  of  se?  ne,  characters 
long,  starting  at  ne-^th  character. 

1 

i 

VAL(se) 

Numeric  value  of  se,  where  se  must 
be  a numeric  string?  e.g. , VAL ("+8" ) 

= 8. 

j; 

| 

ASC (se) 

ASCII  binary  equivalent  of  the 
first  character  of  se. 

CHAR (ne) 

One-character  string  which  is  the 

ASCII  character  whose  numeric  value 

is  ne* 

CTX  (se) 

Internal  binary  equivalent  of  first 
character  of  se. 

j 

ITC (ne 

One-character  string  which  is  the 
character  whose  internal  ASCII 

1 

value  is  ne . 

CATALYST  FUNCTIONS 

ICO(R$,A$,K) 

R$  contains  the  string  A$  (K  - 0) . 

R$  contains  the  word  A$  (K  = 1) . 

IS(R$,A$,K) 

R$  is  the  string  A$  (K  = 0)  . 

R$  is  the  word  A$  (K  = 1). 

IBEF (R$  , A$ ,K,B$,K) 

R$  contains  A$  before  B$ . 

IEQIV  (R$  , A$  ,K) 

R$  contains  one  of  the  strings  in 

A$  delimited  by  commas. 

CALL  REIN 

Reinforce. 

CALL  RRIN 

Really  reinforce. 

PASS 

RESPAS S 

Reset  PASS. 

CALL  REP 

Prints  "?? — PLEASE  RESPOND  AGAIN" 

@NBS 
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